pragma Profile(Ravenscar);

with DataSpec;
use DataSpec;

with ProtectedEntry;
use ProtectedEntry;

with Ada.Text_IO;

package EventHandler is

   task Event_Handler is
      pragma Priority(14); -- i.e. this must be not greater than 15
   end Event_Handler;

end EventHandler;
